home *** CD-ROM | disk | FTP | other *** search
/ Tele-Info Vol. 2 / Tele-Info Vol. 2 (1997)(Tele-Info Verlag)(DE)[!].iso / Dial.rexx next >
OS/2 REXX Batch file  |  1997-03-17  |  1KB  |  45 lines
  1. /*
  2.  * Dial.rexx
  3.  * $VER: Dial.rexx 1.0 10.03.97 by Michael Friedrich
  4.  * ARexx-Skript zu TeleInfo   © Michael Friedrich
  5.  *
  6.  * Dieses Skript wird von TeleInfo aufgerufen, wenn der Benutzer
  7.  * <Bearbeiten-Wählen> auswählt.
  8.  *
  9.  * Dial.rexx Vorwahl Rufnummer
  10.  *
  11.  *
  12.  * Stellen Sie weiter unten ihre Parameter ein:
  13.  *
  14.  * Standordvorwahl: Die Vorwahl, an der der Computer steht.
  15.  *                  Dies wird verwendet, um bei Telefonnummern im
  16.  *                  Ortsbereich die Vorwahl zu entfernen
  17.  * DialCmd          Das Wählprogramm (Vorgabe: DialNumber von Oliver Hitz)
  18.  * DialArgs         Die Parameter für das Wählprogramm (Vorgabe AUDIO)
  19.  *                      ""          Tonwahl per Modem
  20.  *                      "PULSE"     Pulswahl per Modem
  21.  *                      "AUDIO"     Wahl per Lautsprecher
  22.  */
  23.  
  24. /* stellen Sie hier Ihre Vorwahl ein */
  25.     Standordvorwahl = "0721"
  26.  
  27. /* Das Wählprogramm */
  28.     DialCmd = "TeleInfo2CD:DialNumber/DialNumber >NIL:"
  29.  
  30. /* Die Parameter */
  31.     DialArgs = "AUDIO"
  32.  
  33. PARSE arg Vorwahl ' ' Rufnummer
  34.  
  35.  
  36. if Vorwahl == Standordvorwahl then             /* ist Ortsgespräch */
  37.     Nummer=Rufnummer
  38. else                                           /* ist Ferngespräch */
  39.     Nummer=Vorwahl||Rufnummer
  40.  
  41. /* say "Wähle" Nummer || "..." (DialArgs) */
  42. ADDRESS COMMAND
  43. DialCmd Nummer DialArgs
  44.  
  45.